home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Internet Tools 1993 July / Internet Tools.iso / RockRidge / mail / pp / pp-6.0 / Chans / lists / dish.c next >
Encoding:
C/C++ Source or Header  |  1991-12-18  |  2.0 KB  |  94 lines

  1. /* dish.c: */
  2.  
  3. # ifndef lint
  4. static char Rcsid[] = "@(#)$Header: /xtel/pp/pp-beta/Chans/lists/RCS/dish.c,v 6.0 1991/12/18 20:10:43 jpo Rel $";
  5. # endif
  6.  
  7. /*
  8.  * $Header: /xtel/pp/pp-beta/Chans/lists/RCS/dish.c,v 6.0 1991/12/18 20:10:43 jpo Rel $
  9.  *
  10.  * $Log: dish.c,v $
  11.  * Revision 6.0  1991/12/18  20:10:43  jpo
  12.  * Release 6.0
  13.  *
  14.  */
  15.  
  16.  
  17. /* Taken from ISODE quipu/dish/dish.c */
  18.  
  19. #ifdef USE_PP
  20. #include <isode/manifest.h>
  21. #include <isode/quipu/util.h>
  22. #else 
  23. #include "manifest.h"
  24. #include "quipu/util.h"
  25. #endif
  26.  
  27. /*
  28.     OPTIONS...
  29.  
  30.     USE_PP:    Build a version of dish with the PP enhancements.
  31.         Needs libpp.a and libdl.a from PP (PP 4.2 and above).
  32.         Made automatically in PP/Tools/dlist.
  33.  
  34.     MANAGE: Build a management version of Dish.
  35.         Needs libmanage.a from ISODE/others/quipu/uips/manage
  36.         Made automatically in ISODE/others/quipu/uips/manage.
  37.         
  38.  
  39.  */
  40.  
  41. #ifdef MANAGE
  42. IFP call_add_alias ();
  43. IFP call_del_alias ();
  44. IFP call_alias_chk ();
  45. #endif
  46.  
  47. #ifdef USE_PP
  48. IFP call_dlist ();
  49. #endif
  50.  
  51. main (argc, argv)
  52. int             argc;
  53. char          **argv;
  54. {
  55.  
  56.     quipu_syntaxes ();
  57.  
  58. #ifdef REVOKE_SYNTAX
  59.     revoke_syntax();    
  60. #endif
  61.  
  62. #ifdef USE_PP
  63.     pp_quipu_init (argv[0]);
  64. #endif
  65.  
  66.     dish_init (argc,argv);
  67.  
  68. #ifdef USE_PP
  69.     pp_quipu_run ();
  70.  
  71.         add_dish_command ("lmnpq", call_dlist, 2);
  72.         add_dish_help    ("lmnpq", "[-dncheck] [-orcheck] [-orupdate] [-check] [-update]", 
  73.                FALSE, FALSE,
  74.                           "List Manager Now using PP and Quipu,");
  75. #endif
  76.  
  77. #ifdef MANAGE
  78.     add_dish_command ("add_alias", call_add_alias, 5);
  79.     add_dish_help     ("add_alias", "<alias_name> <object>", FALSE, FALSE,
  80.               "add an alias entry,");
  81.     add_dish_command ("del_alias", call_del_alias, 5);
  82.     add_dish_help     ("del_alias", "<object>", FALSE, FALSE, 
  83.               "delete an alias entry,");
  84.     add_dish_command ("alias_chk", call_alias_chk, 5);
  85.     add_dish_help     ("alias_chk", "<object>", FALSE, FALSE, 
  86.               "Check alias or all aliases below <object>,");
  87. #endif
  88.  
  89.     add_dish_help ("quit","", FALSE, FALSE, "Quit the program.");
  90.     add_dish_help (NULLCP,NULLCP,0,0,NULLCP);
  91.  
  92.     do_dish ();
  93. }
  94.